﻿Public Class Administrador : Inherits Persona : Implements IEquatable(Of Administrador)
    ''' <summary>
    ''' Constructor de administrador
    ''' </summary>
    ''' <param name="nombre">Nombre del administrador</param>
    ''' <param name="contraseña">Contraseña administrador</param>
    ''' <remarks></remarks>
    Public Sub New(ByVal nombre As String, ByVal contraseña As String)
        Me.Nombre = nombre
        Me.Contraseña = contraseña
    End Sub
    ''' <summary>
    ''' Constructor por defecto
    ''' </summary>
    ''' <remarks></remarks>
    Public Sub New()
        Me.Nombre = "Administrador"
        Me.Contraseña = "administrador"
    End Sub
    ''' <summary>
    ''' Dos administradores serán iguales si tienen el mismo nombre
    ''' </summary>
    ''' <param name="other"></param>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Overloads Function Equals(other As Administrador) As Boolean Implements IEquatable(Of Administrador).Equals
        Return other IsNot Nothing AndAlso other.Nombre.ToLower = Me.Nombre.ToLower
    End Function
End Class
